home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / apps / 191a / examples / fork.st < prev    next >
Encoding:
Text File  |  1993-06-26  |  145 b   |  14 lines
  1. Class Main
  2. [
  3.     loop1
  4.         10 timesRepeat: [17 print]
  5. |
  6.     loop2
  7.         10 timesRepeat: [23 print]
  8. |
  9.     main
  10.         [self loop1] fork.
  11.         self loop2
  12. ]
  13.  
  14.